home *** CD-ROM | disk | FTP | other *** search
- Examples wit two-dimensional arrays
-
- life.f: two dimensional cellular automata
-
- Output:
- 506 animals in iteration 1
- 1009 animals in iteration 2
- 1007 animals in iteration 3
- 2009 animals in iteration 4
- 999 animals in iteration 5
- 1991 animals in iteration 6
- 1987 animals in iteration 7
- 3963 animals in iteration 8
- 989 animals in iteration 9
- 1965 animals in iteration 10
- 1961 animals in iteration 11
- 3905 animals in iteration 12
- 1945 animals in iteration 13
- 3869 animals in iteration 14
- 3861 animals in iteration 15
- 7693 animals in iteration 16
- 975 animals in iteration 17
- 1919 animals in iteration 18
- 1915 animals in iteration 19
- 3795 animals in iteration 20
- ....
- 20951 animals in iteration 96
- 1663 animals in iteration 97
- 2915 animals in iteration 98
- 2907 animals in iteration 99
- 5395 animals in iteration 100
-
- flow.f: sequential algorithm for flow visualization
-
- - use sequential compiler to compare
- - link also with XLIB
-
- flow.f9: parallelized Fortran 90 version with global send
-
- - host program required, external calls
- - uses XLIB (link host program with $(XLIB))
-
- At the moment the program will stop with:
-
- Index value 129 out of range
- Fatal ERROR, will exit
-
- flowm.f9: parallelized Fortran 90 version with global send and mask
-
- - host program required, external calls
- - uses XLIB (link host program with $(XLIB))
-
- This program tests the range with the mask, no more out of range
-
- flow_add.f9: global send with mask and addition of values
-
- In this case one can see better where more flow particles are
-
-